home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995 August: Tool Chest / Dev.CD Aug 95 TC / Dev.CD Aug 95 TC.toast / Tool Chest / Interfaces / UniversalInterfaces 2.1B1 / AIncludes / Editions.a < prev    next >
Encoding:
Text File  |  1995-04-18  |  15.0 KB  |  618 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Editions.a
  3. ;
  4. ;    Contains:    Edition Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Package:    Universal Interfaces 2.1ß1 in “MPW Prerelease” on ETO #17
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__EDITIONS__') = 'UNDEFINED' THEN
  21. __EDITIONS__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__MEMORY__') = 'UNDEFINED' THEN
  25.     include 'Memory.a'
  26.     ENDIF
  27. ;        include 'Types.a'                                            ;
  28. ;            include 'ConditionalMacros.a'                            ;
  29. ;        include 'MixedMode.a'                                        ;
  30.  
  31.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  32.     include 'Types.a'
  33.     ENDIF
  34.  
  35.     IF &TYPE('__FILES__') = 'UNDEFINED' THEN
  36.     include 'Files.a'
  37.     ENDIF
  38. ;        include 'OSUtils.a'                                        ;
  39.  
  40.     IF &TYPE('__ALIASES__') = 'UNDEFINED' THEN
  41.     include 'Aliases.a'
  42.     ENDIF
  43. ;        include 'AppleTalk.a'                                        ;
  44.  
  45.     IF &TYPE('__DIALOGS__') = 'UNDEFINED' THEN
  46.     include 'Dialogs.a'
  47.     ENDIF
  48. ;        include 'Errors.a'                                            ;
  49. ;        include 'Windows.a'                                        ;
  50. ;            include 'Quickdraw.a'                                    ;
  51. ;                include 'QuickdrawText.a'                            ;
  52. ;            include 'Events.a'                                        ;
  53. ;            include 'Controls.a'                                    ;
  54. ;                include 'Menus.a'                                    ;
  55. ;        include 'TextEdit.a'                                        ;
  56.  
  57. ; resource types  
  58. rSectionType                    EQU        'sect'                ; ResType of saved SectionRecords 
  59. ; Finder types for edition files 
  60. kPICTEditionFileType            EQU        'edtp'
  61. kTEXTEditionFileType            EQU        'edtt'
  62. ksndEditionFileType                EQU        'edts'
  63. kUnknownEditionFileType            EQU        'edtu'
  64. kPublisherDocAliasFormat        EQU        'alis'
  65. kPreviewFormat                    EQU        'prvw'
  66. kFormatListFormat                EQU        'fmts'
  67.  
  68. ; section types 
  69. stSubscriber                    EQU        $01
  70. stPublisher                        EQU        $0A
  71. sumAutomatic                    EQU        0                    ; subscriber update mode - Automatically     
  72. sumManual                        EQU        1                    ; subscriber update mode - Manually 
  73. pumOnSave                        EQU        0                    ; publisher update mode - OnSave            
  74. pumManual                        EQU        1                    ; publisher update mode - Manually 
  75. kPartsNotUsed                    EQU        0
  76. kPartNumberUnknown                EQU        -1                    ; misc 
  77. kPreviewWidth                    EQU        120
  78. kPreviewHeight                    EQU        120
  79. ; bits for formatsMask 
  80. kPICTformatMask                    EQU        1
  81. kTEXTformatMask                    EQU        2
  82. ksndFormatMask                    EQU        4
  83. ; pseudo-item hits for dialogHooks 
  84. ; the first if for NewPublisher or NewSubscriber Dialogs 
  85. emHookRedrawPreview                EQU        150
  86. ; the following are for SectionOptions Dialog 
  87. emHookCancelSection                EQU        160
  88. emHookGoToPublisher                EQU        161
  89. emHookGetEditionNow                EQU        162
  90. emHookSendEditionNow            EQU        162
  91. emHookManualUpdateMode            EQU        163
  92. emHookAutoUpdateMode            EQU        164
  93.  
  94. ; the refcon field of the dialog record during a modalfilter 
  95. ; or dialoghook contains one the following 
  96. emOptionsDialogRefCon            EQU        'optn'
  97. emCancelSectionDialogRefCon        EQU        'cncl'
  98. emGoToPubErrDialogRefCon        EQU        'gerr'
  99. kFormatLengthUnknown            EQU        -1
  100.  
  101. ; one byte, stSubscriber or stPublisher 
  102. ; typedef SignedByte         SectionType
  103. ; seconds since 1904 
  104. ; typedef unsigned long     TimeStamp
  105. ; similar to ResType 
  106. ; typedef FourCharCode         FormatType
  107. ; used in Edition I/O 
  108. ; typedef Handle             EditionRefNum
  109. ; update modes 
  110. ; sumAutomatic, pumSuspend, etc 
  111. ; typedef short             UpdateMode
  112. ; typedef struct SectionRecord  SectionRecord
  113. ; typedef SectionRecord     *SectionPtr, **SectionHandle
  114. SectionRecord             RECORD    0
  115. version                     ds.b   1        ; offset: $0 (0)        ; always 0x01 in system 7.0 
  116. kind                     ds.b   1        ; offset: $1 (1)        ; stSubscriber or stPublisher 
  117. mode                     ds.w   1        ; offset: $2 (2)        ; auto or manual 
  118. mdDate                     ds.l   1        ; offset: $4 (4)        ; last change in document 
  119. sectionID                 ds.l   1        ; offset: $8 (8)        ; app. specific, unique per document 
  120. refCon                     ds.l   1        ; offset: $C (12)        ; application specific 
  121. alias                     ds.l   1        ; offset: $10 (16)        ; handle to Alias Record 
  122. subPart                     ds.l   1        ; offset: $14 (20)        ; which part of container file 
  123. nextSection                 ds.l   1        ; offset: $18 (24)        ; for linked list of app's Sections 
  124. controlBlock             ds.l   1        ; offset: $1C (28)        ; used internally 
  125. refNum                     ds.l   1        ; offset: $20 (32)        ; used internally 
  126. sizeof                     EQU *            ; size:   $24 (36)
  127.                         ENDR
  128.  
  129. EditionContainerSpec     RECORD    0
  130. theFile                     ds     FSSpec    ; offset: $0 (0)
  131. theFileScript             ds.w   1        ; offset: $46 (70)
  132. thePart                     ds.l   1        ; offset: $48 (72)
  133. thePartName                 ds.l   8        ; offset: $4C (76)
  134. thePartScript             ds.w   1        ; offset: $6C (108)
  135. sizeof                     EQU *            ; size:   $6E (110)
  136.                         ENDR
  137.  
  138. ; typedef struct EditionContainerSpec  EditionContainerSpec
  139. ; typedef EditionContainerSpec  *EditionContainerSpecPtr
  140. EditionInfoRecord         RECORD    0
  141. crDate                     ds.l   1        ; offset: $0 (0)        ; date EditionContainer was created 
  142. mdDate                     ds.l   1        ; offset: $4 (4)        ; date of last change 
  143. fdCreator                 ds.l   1        ; offset: $8 (8)        ; file creator 
  144. fdType                     ds.l   1        ; offset: $C (12)        ; file type 
  145. container                 ds     EditionContainerSpec ; offset: $10 (16) ; the Edition 
  146. sizeof                     EQU *            ; size:   $7E (126)
  147.                         ENDR
  148.  
  149. ; typedef struct EditionInfoRecord  EditionInfoRecord
  150. NewPublisherReply         RECORD    0
  151. canceled                 ds.b   1        ; offset: $0 (0)        ; O 
  152. replacing                 ds.b   1        ; offset: $1 (1)
  153. usePart                     ds.b   1        ; offset: $2 (2)        ; I 
  154. filler                     ds.b   1        ; offset: $3 (3)
  155. preview                     ds.l   1        ; offset: $4 (4)        ; I 
  156. previewFormat             ds.l   1        ; offset: $8 (8)        ; I 
  157. container                 ds     EditionContainerSpec ; offset: $C (12) ; I/O 
  158. sizeof                     EQU *            ; size:   $7A (122)
  159.                         ENDR
  160.  
  161. ; typedef struct NewPublisherReply  NewPublisherReply
  162. NewSubscriberReply         RECORD    0
  163. canceled                 ds.b   1        ; offset: $0 (0)        ; O 
  164. formatsMask                 ds.b   1        ; offset: $1 (1)
  165. container                 ds     EditionContainerSpec ; offset: $2 (2) ;I/O
  166. sizeof                     EQU *            ; size:   $70 (112)
  167.                         ENDR
  168.  
  169. ; typedef struct NewSubscriberReply  NewSubscriberReply
  170. SectionOptionsReply     RECORD    0
  171. canceled                 ds.b   1        ; offset: $0 (0)        ; O 
  172. changed                     ds.b   1        ; offset: $1 (1)        ; O 
  173. sectionH                 ds.l   1        ; offset: $2 (2)        ; I 
  174. action                     ds.l   1        ; offset: $6 (6)        ; O 
  175. sizeof                     EQU *            ; size:   $A (10)
  176.                         ENDR
  177.  
  178. ; typedef struct SectionOptionsReply  SectionOptionsReply
  179.  
  180. ioHasFormat                        EQU        0
  181. ioReadFormat                    EQU        1
  182. ioNewFormat                        EQU        2
  183. ioWriteFormat                    EQU        3
  184.  
  185. ; typedef SignedByte         FormatIOVerb
  186.  
  187. eoOpen                            EQU        0
  188. eoClose                            EQU        1
  189. eoOpenNew                        EQU        2
  190. eoCloseNew                        EQU        3
  191. eoCanSubscribe                    EQU        4
  192.  
  193. ; typedef SignedByte         EditionOpenerVerb
  194. FormatIOParamBlock         RECORD    0
  195. ioRefNum                 ds.l   1        ; offset: $0 (0)
  196. format                     ds.l   1        ; offset: $4 (4)
  197. formatIndex                 ds.l   1        ; offset: $8 (8)
  198. offset                     ds.l   1        ; offset: $C (12)
  199. buffPtr                     ds.l   1        ; offset: $10 (16)
  200. buffLen                     ds.l   1        ; offset: $14 (20)
  201. sizeof                     EQU *            ; size:   $18 (24)
  202.                         ENDR
  203.  
  204. ; typedef struct FormatIOParamBlock  FormatIOParamBlock
  205. ; typedef struct EditionOpenerParamBlock  EditionOpenerParamBlock
  206. EditionOpenerParamBlock RECORD    0
  207. info                     ds     EditionInfoRecord ; offset: $0 (0)
  208. sectionH                 ds.l   1        ; offset: $7E (126)
  209. document                 ds.l   1        ; offset: $82 (130)
  210. fdCreator                 ds.l   1        ; offset: $86 (134)
  211. ioRefNum                 ds.l   1        ; offset: $8A (138)
  212. ioProc                     ds.l   1        ; offset: $8E (142)
  213. success                     ds.b   1        ; offset: $92 (146)
  214. formatsMask                 ds.b   1        ; offset: $93 (147)
  215. sizeof                     EQU *            ; size:   $94 (148)
  216.                         ENDR
  217.  
  218.  
  219. sectionEventMsgClass            EQU        'sect'
  220. sectionReadMsgID                EQU        'read'
  221. sectionWriteMsgID                EQU        'writ'
  222. sectionScrollMsgID                EQU        'scrl'
  223. sectionCancelMsgID                EQU        'cncl'
  224.  
  225. currentEditionMgrVers            EQU        $0011
  226.  
  227. ;
  228. ; pascal OSErr InitEditionPackVersion(short curEditionMgrVers)
  229. ;
  230.     IF ¬ GENERATINGCFM THEN
  231.         Macro
  232.         _InitEditionPackVersion
  233.             move.w    #$0100,d0
  234.             dc.w     $A82D
  235.         EndM
  236.     ELSE
  237.         IMPORT_CFM_FUNCTION    InitEditionPackVersion
  238.     ENDIF
  239.  
  240. ;
  241. ; pascal OSErr NewSection(const EditionContainerSpec *container, ConstFSSpecPtr sectionDocument, SectionType kind, long sectionID, UpdateMode initalMode, SectionHandle *sectionH)
  242. ;
  243.     IF ¬ GENERATINGCFM THEN
  244.         Macro
  245.         _NewSection
  246.             move.w    #$0A02,d0
  247.             dc.w     $A82D
  248.         EndM
  249.     ELSE
  250.         IMPORT_CFM_FUNCTION    NewSection
  251.     ENDIF
  252.  
  253. ;
  254. ; pascal OSErr RegisterSection(const FSSpec *sectionDocument, SectionHandle sectionH, Boolean *aliasWasUpdated)
  255. ;
  256.     IF ¬ GENERATINGCFM THEN
  257.         Macro
  258.         _RegisterSection
  259.             move.w    #$0604,d0
  260.             dc.w     $A82D
  261.         EndM
  262.     ELSE
  263.         IMPORT_CFM_FUNCTION    RegisterSection
  264.     ENDIF
  265.  
  266. ;
  267. ; pascal OSErr UnRegisterSection(SectionHandle sectionH)
  268. ;
  269.     IF ¬ GENERATINGCFM THEN
  270.         Macro
  271.         _UnRegisterSection
  272.             move.w    #$0206,d0
  273.             dc.w     $A82D
  274.         EndM
  275.     ELSE
  276.         IMPORT_CFM_FUNCTION    UnRegisterSection
  277.     ENDIF
  278.  
  279. ;
  280. ; pascal OSErr IsRegisteredSection(SectionHandle sectionH)
  281. ;
  282.     IF ¬ GENERATINGCFM THEN
  283.         Macro
  284.         _IsRegisteredSection
  285.             move.w    #$0208,d0
  286.             dc.w     $A82D
  287.         EndM
  288.     ELSE
  289.         IMPORT_CFM_FUNCTION    IsRegisteredSection
  290.     ENDIF
  291.  
  292. ;
  293. ; pascal OSErr AssociateSection(SectionHandle sectionH, const FSSpec *newSectionDocument)
  294. ;
  295.     IF ¬ GENERATINGCFM THEN
  296.         Macro
  297.         _AssociateSection
  298.             move.w    #$040C,d0
  299.             dc.w     $A82D
  300.         EndM
  301.     ELSE
  302.         IMPORT_CFM_FUNCTION    AssociateSection
  303.     ENDIF
  304.  
  305. ;
  306. ; pascal OSErr CreateEditionContainerFile(const FSSpec *editionFile, OSType fdCreator, ScriptCode editionFileNameScript)
  307. ;
  308.     IF ¬ GENERATINGCFM THEN
  309.         Macro
  310.         _CreateEditionContainerFile
  311.             move.w    #$050E,d0
  312.             dc.w     $A82D
  313.         EndM
  314.     ELSE
  315.         IMPORT_CFM_FUNCTION    CreateEditionContainerFile
  316.     ENDIF
  317.  
  318. ;
  319. ; pascal OSErr DeleteEditionContainerFile(const FSSpec *editionFile)
  320. ;
  321.     IF ¬ GENERATINGCFM THEN
  322.         Macro
  323.         _DeleteEditionContainerFile
  324.             move.w    #$0210,d0
  325.             dc.w     $A82D
  326.         EndM
  327.     ELSE
  328.         IMPORT_CFM_FUNCTION    DeleteEditionContainerFile
  329.     ENDIF
  330.  
  331. ;
  332. ; pascal OSErr OpenEdition(SectionHandle subscriberSectionH, EditionRefNum *refNum)
  333. ;
  334.     IF ¬ GENERATINGCFM THEN
  335.         Macro
  336.         _OpenEdition
  337.             move.w    #$0412,d0
  338.             dc.w     $A82D
  339.         EndM
  340.     ELSE
  341.         IMPORT_CFM_FUNCTION    OpenEdition
  342.     ENDIF
  343.  
  344. ;
  345. ; pascal OSErr OpenNewEdition(SectionHandle publisherSectionH, OSType fdCreator, ConstFSSpecPtr publisherSectionDocument, EditionRefNum *refNum)
  346. ;
  347.     IF ¬ GENERATINGCFM THEN
  348.         Macro
  349.         _OpenNewEdition
  350.             move.w    #$0814,d0
  351.             dc.w     $A82D
  352.         EndM
  353.     ELSE
  354.         IMPORT_CFM_FUNCTION    OpenNewEdition
  355.     ENDIF
  356.  
  357. ;
  358. ; pascal OSErr CloseEdition(EditionRefNum whichEdition, Boolean successful)
  359. ;
  360.     IF ¬ GENERATINGCFM THEN
  361.         Macro
  362.         _CloseEdition
  363.             move.w    #$0316,d0
  364.             dc.w     $A82D
  365.         EndM
  366.     ELSE
  367.         IMPORT_CFM_FUNCTION    CloseEdition
  368.     ENDIF
  369.  
  370. ;
  371. ; pascal OSErr EditionHasFormat(EditionRefNum whichEdition, FormatType whichFormat, Size *formatSize)
  372. ;
  373.     IF ¬ GENERATINGCFM THEN
  374.         Macro
  375.         _EditionHasFormat
  376.             move.w    #$0618,d0
  377.             dc.w     $A82D
  378.         EndM
  379.     ELSE
  380.         IMPORT_CFM_FUNCTION    EditionHasFormat
  381.     ENDIF
  382.  
  383. ;
  384. ; pascal OSErr ReadEdition(EditionRefNum whichEdition, FormatType whichFormat, void *buffPtr, Size *buffLen)
  385. ;
  386.     IF ¬ GENERATINGCFM THEN
  387.         Macro
  388.         _ReadEdition
  389.             move.w    #$081A,d0
  390.             dc.w     $A82D
  391.         EndM
  392.     ELSE
  393.         IMPORT_CFM_FUNCTION    ReadEdition
  394.     ENDIF
  395.  
  396. ;
  397. ; pascal OSErr WriteEdition(EditionRefNum whichEdition, FormatType whichFormat, const void *buffPtr, Size buffLen)
  398. ;
  399.     IF ¬ GENERATINGCFM THEN
  400.         Macro
  401.         _WriteEdition
  402.             move.w    #$081C,d0
  403.             dc.w     $A82D
  404.         EndM
  405.     ELSE
  406.         IMPORT_CFM_FUNCTION    WriteEdition
  407.     ENDIF
  408.  
  409. ;
  410. ; pascal OSErr GetEditionFormatMark(EditionRefNum whichEdition, FormatType whichFormat, unsigned long *currentMark)
  411. ;
  412.     IF ¬ GENERATINGCFM THEN
  413.         Macro
  414.         _GetEditionFormatMark
  415.             move.w    #$061E,d0
  416.             dc.w     $A82D
  417.         EndM
  418.     ELSE
  419.         IMPORT_CFM_FUNCTION    GetEditionFormatMark
  420.     ENDIF
  421.  
  422. ;
  423. ; pascal OSErr SetEditionFormatMark(EditionRefNum whichEdition, FormatType whichFormat, unsigned long setMarkTo)
  424. ;
  425.     IF ¬ GENERATINGCFM THEN
  426.         Macro
  427.         _SetEditionFormatMark
  428.             move.w    #$0620,d0
  429.             dc.w     $A82D
  430.         EndM
  431.     ELSE
  432.         IMPORT_CFM_FUNCTION    SetEditionFormatMark
  433.     ENDIF
  434.  
  435. ;
  436. ; pascal OSErr GetEditionInfo(SectionHandle sectionH, EditionInfoRecord *editionInfo)
  437. ;
  438.     IF ¬ GENERATINGCFM THEN
  439.         Macro
  440.         _GetEditionInfo
  441.             move.w    #$0422,d0
  442.             dc.w     $A82D
  443.         EndM
  444.     ELSE
  445.         IMPORT_CFM_FUNCTION    GetEditionInfo
  446.     ENDIF
  447.  
  448. ;
  449. ; pascal OSErr GoToPublisherSection(const EditionContainerSpec *container)
  450. ;
  451.     IF ¬ GENERATINGCFM THEN
  452.         Macro
  453.         _GoToPublisherSection
  454.             move.w    #$0224,d0
  455.             dc.w     $A82D
  456.         EndM
  457.     ELSE
  458.         IMPORT_CFM_FUNCTION    GoToPublisherSection
  459.     ENDIF
  460.  
  461. ;
  462. ; pascal OSErr GetLastEditionContainerUsed(EditionContainerSpec *container)
  463. ;
  464.     IF ¬ GENERATINGCFM THEN
  465.         Macro
  466.         _GetLastEditionContainerUsed
  467.             move.w    #$0226,d0
  468.             dc.w     $A82D
  469.         EndM
  470.     ELSE
  471.         IMPORT_CFM_FUNCTION    GetLastEditionContainerUsed
  472.     ENDIF
  473.  
  474. ;
  475. ; pascal OSErr GetStandardFormats(const EditionContainerSpec *container, FormatType *previewFormat, Handle preview, Handle publisherAlias, Handle formats)
  476. ;
  477.     IF ¬ GENERATINGCFM THEN
  478.         Macro
  479.         _GetStandardFormats
  480.             move.w    #$0A28,d0
  481.             dc.w     $A82D
  482.         EndM
  483.     ELSE
  484.         IMPORT_CFM_FUNCTION    GetStandardFormats
  485.     ENDIF
  486.  
  487. ;
  488. ; pascal OSErr GetEditionOpenerProc(EditionOpenerUPP *opener)
  489. ;
  490.     IF ¬ GENERATINGCFM THEN
  491.         Macro
  492.         _GetEditionOpenerProc
  493.             move.w    #$022A,d0
  494.             dc.w     $A82D
  495.         EndM
  496.     ELSE
  497.         IMPORT_CFM_FUNCTION    GetEditionOpenerProc
  498.     ENDIF
  499.  
  500. ;
  501. ; pascal OSErr SetEditionOpenerProc(EditionOpenerUPP opener)
  502. ;
  503.     IF ¬ GENERATINGCFM THEN
  504.         Macro
  505.         _SetEditionOpenerProc
  506.             move.w    #$022C,d0
  507.             dc.w     $A82D
  508.         EndM
  509.     ELSE
  510.         IMPORT_CFM_FUNCTION    SetEditionOpenerProc
  511.     ENDIF
  512.  
  513. ;
  514. ; pascal OSErr CallEditionOpenerProc(EditionOpenerVerb selector, EditionOpenerParamBlock *PB, EditionOpenerUPP routine)
  515. ;
  516.     IF ¬ GENERATINGCFM THEN
  517.         Macro
  518.         _CallEditionOpenerProc
  519.             move.w    #$052E,d0
  520.             dc.w     $A82D
  521.         EndM
  522.     ELSE
  523.         IMPORT_CFM_FUNCTION    CallEditionOpenerProc
  524.     ENDIF
  525.  
  526. ;
  527. ; pascal OSErr CallFormatIOProc(FormatIOVerb selector, FormatIOParamBlock *PB, FormatIOUPP routine)
  528. ;
  529.     IF ¬ GENERATINGCFM THEN
  530.         Macro
  531.         _CallFormatIOProc
  532.             move.w    #$0530,d0
  533.             dc.w     $A82D
  534.         EndM
  535.     ELSE
  536.         IMPORT_CFM_FUNCTION    CallFormatIOProc
  537.     ENDIF
  538.  
  539. ;
  540. ; pascal OSErr NewSubscriberDialog(NewSubscriberReply *reply)
  541. ;
  542.     IF ¬ GENERATINGCFM THEN
  543.         Macro
  544.         _NewSubscriberDialog
  545.             move.w    #$0232,d0
  546.             dc.w     $A82D
  547.         EndM
  548.     ELSE
  549.         IMPORT_CFM_FUNCTION    NewSubscriberDialog
  550.     ENDIF
  551.  
  552. ;
  553. ; pascal OSErr NewSubscriberExpDialog(NewSubscriberReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  554. ;
  555.     IF ¬ GENERATINGCFM THEN
  556.         Macro
  557.         _NewSubscriberExpDialog
  558.             move.w    #$0B34,d0
  559.             dc.w     $A82D
  560.         EndM
  561.     ELSE
  562.         IMPORT_CFM_FUNCTION    NewSubscriberExpDialog
  563.     ENDIF
  564.  
  565. ;
  566. ; pascal OSErr NewPublisherDialog(NewPublisherReply *reply)
  567. ;
  568.     IF ¬ GENERATINGCFM THEN
  569.         Macro
  570.         _NewPublisherDialog
  571.             move.w    #$0236,d0
  572.             dc.w     $A82D
  573.         EndM
  574.     ELSE
  575.         IMPORT_CFM_FUNCTION    NewPublisherDialog
  576.     ENDIF
  577.  
  578. ;
  579. ; pascal OSErr NewPublisherExpDialog(NewPublisherReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  580. ;
  581.     IF ¬ GENERATINGCFM THEN
  582.         Macro
  583.         _NewPublisherExpDialog
  584.             move.w    #$0B38,d0
  585.             dc.w     $A82D
  586.         EndM
  587.     ELSE
  588.         IMPORT_CFM_FUNCTION    NewPublisherExpDialog
  589.     ENDIF
  590.  
  591. ;
  592. ; pascal OSErr SectionOptionsDialog(SectionOptionsReply *reply)
  593. ;
  594.     IF ¬ GENERATINGCFM THEN
  595.         Macro
  596.         _SectionOptionsDialog
  597.             move.w    #$023A,d0
  598.             dc.w     $A82D
  599.         EndM
  600.     ELSE
  601.         IMPORT_CFM_FUNCTION    SectionOptionsDialog
  602.     ENDIF
  603.  
  604. ;
  605. ; pascal OSErr SectionOptionsExpDialog(SectionOptionsReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  606. ;
  607.     IF ¬ GENERATINGCFM THEN
  608.         Macro
  609.         _SectionOptionsExpDialog
  610.             move.w    #$0B3C,d0
  611.             dc.w     $A82D
  612.         EndM
  613.     ELSE
  614.         IMPORT_CFM_FUNCTION    SectionOptionsExpDialog
  615.     ENDIF
  616.  
  617.     ENDIF ; __EDITIONS__
  618.